home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Light ROM 1
/
LIGHT-ROM 1 (Amiga Library Services)(1994).iso
/
ffdisks
/
d949.lha
/
BBBBS
/
BBBBS65.lha
/
rexx
/
ShowLog.baud
< prev
next >
Wrap
Text File
|
1993-07-06
|
373b
|
19 lines
/* showlog.baud */
OPTIONS RESULTS
dcd
IF RC>0 THEN RETURN
yearmonthday=""
PARSE ARG yearmonthday .
IF LENGTH(yearmonthday)~=8 THEN yearmonthday=DATE('S')
bbspath=GETCLIP('BBS_path')
filename=bbspath'Logs/log.'yearmonthday
Send 'ATH1\r'
IF EXISTS(filename) THEN
ADDRESS COMMAND 'type' filename
ELSE SAY 'Can''t find log file for' DATE(,yearmonthday,'S')
Send 'ATH\r'